home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Nebula 2
/
Nebula Two.iso
/
WebObjects
/
SourceCode
/
ReadWriteStringEx
/
ReadWriteStringEx.wos
< prev
Wrap
Text File
|
1996-04-20
|
520b
|
30 lines
////////////////////////
// ReadWriteString
// by Charles Lloyd
////////////////////////
persistent id aString;
persistent id isEditable;
persistent id buttonString;
- awake
{
if (!aString) {
aString = @"Hello World";
isEditable = YES;
[self toggleEditable];
}
}
- toggleEditable
{
if (isEditable == YES) {
isEditable = NO;
buttonString = @"Make Editable";
} else {
isEditable = YES;
buttonString = @"Make Read Only";
}
return self;
}